function rest=checksig()

load('orthbase');
sig1=@(s) exp(s);

sig2=exp(linspace(0,1,10000));

rest1=zeros(100,1); rest2=rest1;
for ii=1:100
    t=1/99999*101*(ii-1);
    rest1(ii)= rest(ii)+sig2(1+101*(ii-1))*ms{ii}(t);
    rest2(ii)= rest(ii)+sig1(t)*ms{ii}(t);
end

rest=max(abs(rest1-rest2));
